home *** CD-ROM | disk | FTP | other *** search
/ U.S. Robotics Connections 2 / US Robotics Connections.iso / pc / sourcepc / aol / disk1 / tcp.cc_ / tcp.cc
Encoding:
Text File  |  1994-02-27  |  1.8 KB  |  55 lines
  1. !----------------------------------------------------------------------
  2. !   TCP.CCL
  3. !----------------------------------------------------------------------
  4.  
  5. !----------------------------------------------------------------------
  6. !                        Connect Sequence:
  7. !----------------------------------------------------------------------
  8. -LABEL 0
  9. Revision 1
  10. DsplyMsg Step 1: Initializing TCP/IP ...
  11. CanBtn   2               { if cancel button - just exit }
  12. DsplyPic 1
  13. NetConnect 1 ~PORT ~HOST 
  14. NetError 3 4  
  15.  
  16. !----------------------------------------------------------------------
  17. !           Did we connect to the HOST successfully
  18. !----------------------------------------------------------------------
  19. -LABEL 1
  20. DsplyPic 2
  21. DsplyMsg Step 2: Connecting using TCP/IP ...
  22. DsplyPic 3
  23. DsplyMsg Checking password ...
  24. Exit 0
  25.  
  26. !----------------------------------------------------------------------
  27. !           User hit the Cancel Button, Get out (No Hangup required)
  28. !----------------------------------------------------------------------
  29. -Label 2        
  30. Exit -1
  31.  
  32. !----------------------------------------------------------------------
  33. !                Should we display the 800 number
  34. !----------------------------------------------------------------------
  35. -LABEL 3
  36. Alert 2 \13\13If the problem persists, call ~APPL customer service at ~ACUS.
  37. Exit -1
  38.  
  39. !----------------------------------------------------------------------
  40. !           Just have the User call their System Administrator
  41. !----------------------------------------------------------------------
  42. -LABEL 4
  43. Alert 2 \13\13If the problem persists, call your System Administrator.
  44. Exit -1
  45.  
  46. !----------------------------------------------------------------------
  47. !
  48. *-Label 0                {Hangup Sequence}
  49. *CanBtn 2
  50. *NetDisc
  51. *Exit 0
  52. !
  53. ###
  54.  
  55.